home *** CD-ROM | disk | FTP | other *** search
/ Mac Mania 2 / MacMania 2.toast / Demo's / Tools&Utilities / HyperCard / CambridgeMedlineTutor / ccMedTut1 / card_31451.txt < prev    next >
Encoding:
Text File  |  1993-04-19  |  1.9 KB  |  117 lines
  1. -- card: 31451 from stack: in
  2. -- bmap block id: 31610
  3. -- flags: 0000
  4. -- background id: 11419
  5. -- name: 
  6. ----- HyperTalk script -----
  7. -- Hidden field - card field id 5
  8.  
  9. On OpenCard
  10.   put empty into card field id 1
  11. End OpenCard
  12.  
  13. on ReturnKey
  14.   set the UserLevel to 2
  15.   click at 19,102
  16.   type quote
  17.   wait 30
  18.   type "d"
  19.   wait 30
  20.   type "i"
  21.   wait 30
  22.   type "e"
  23.   wait 30
  24.   type "t"
  25.   wait 30
  26.   type ","
  27.   wait 30
  28.   type " "
  29.   wait 30
  30.   type "r"
  31.   wait 30
  32.   type "e"
  33.   wait 30
  34.   type "d"
  35.   wait 30
  36.   type "u"
  37.   wait 30
  38.   type "c"
  39.   wait 30
  40.   type "i"
  41.   wait 30
  42.   type "n"
  43.   wait 30
  44.   type "g"
  45.   wait 30
  46.   type quote
  47.   click at 400,400
  48.   global x
  49.   lock screen
  50.   go next
  51.   hide card field "red"
  52.   unlock screen
  53.   wait x
  54.   lock screen
  55.   show card field "red"
  56.   unlock screen with dissolve
  57. end ReturnKey
  58.  
  59.  
  60.  
  61.  
  62.  
  63. -- part 1 (field)
  64. -- low flags: 00
  65. -- high flags: 0000
  66. -- rect: left=17 top=92 right=108 bottom=298
  67. -- title width / last selected line: 0
  68. -- icon id / first selected line: 0 / 0
  69. -- text alignment: 0
  70. -- font id: 3
  71. -- text size: 12
  72. -- style flags: 0
  73. -- line height: 16
  74. -- part name: 
  75. ----- HyperTalk script -----
  76. if the Optionkey is down then go next card
  77.  
  78.  
  79. -- part 5 (field)
  80. -- low flags: 00
  81. -- high flags: 0004
  82. -- rect: left=70 top=164 right=188 bottom=433
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 0
  86. -- font id: 3
  87. -- text size: 12
  88. -- style flags: 0
  89. -- line height: 16
  90. -- part name: red
  91.  
  92.  
  93. -- part 7 (field)
  94. -- low flags: 00
  95. -- high flags: 0000
  96. -- rect: left=146 top=270 right=288 bottom=209
  97. -- title width / last selected line: 0
  98. -- icon id / first selected line: 0 / 0
  99. -- text alignment: 0
  100. -- font id: 0
  101. -- text size: 12
  102. -- style flags: 2048
  103. -- line height: 16
  104. -- part name: 
  105.  
  106.  
  107. -- part contents for card part 5
  108. ----- text -----
  109.    Now hit RETURN and the second term will be entered... 
  110.  
  111. -- part contents for card part 7
  112. ----- text -----
  113. Search
  114.  
  115. -- part contents for background part 3
  116. ----- text -----
  117. Search Menu